package biz.datalk.industrialland.common.util;

import biz.datalk.industrialland.common.util.redis.RedisScanCallback;
import com.google.common.collect.Sets;
import lombok.extern.slf4j.Slf4j;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.dao.DataAccessException;
import org.springframework.data.redis.connection.RedisConnection;
import org.springframework.data.redis.core.*;
import org.springframework.data.redis.serializer.RedisSerializer;
import org.springframework.stereotype.Component;
import org.springframework.util.CollectionUtils;

import java.nio.charset.StandardCharsets;
import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;

/**
 * redis 工具类
 *
 * @author tarofang@163.com
 * @date 2019年08月11日
 */
@SuppressWarnings({"UnusedReturnValue", "ConstantConditions", "unused", "JavaDoc"})
@Slf4j
@Component
public class RedisUtil {

    private final RedisTemplate<String, Object> redisTemplate;

    @Autowired
    public RedisUtil(RedisTemplate<String, Object> redisTemplate) {
        this.redisTemplate = redisTemplate;
    }

    public RedisTemplate<String, Object> getRedisTemplate() {
        return this.redisTemplate;
    }

    /**
     * 指定缓存失效时间
     *
     * @param key  键
     * @param time 时间(秒)
     *
     * @return true-设置成功 false-设置失败
     *
     * @author tarofang@163.com
     * @date 2019年08月11日
     */
    public boolean expire(String key, long time) {
        try {
            if (time > 0) {
                redisTemplate.expire(key, time, TimeUnit.SECONDS);
                log.debug("set expire success. key: {}, time: {}", key, time);
            } else {
                log.debug("Invalid time. key: {}, time: {}", key, time);
            }
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 根据 key 获取过期时间
     *
     * @param key 键 不能为null
     *
     * @return 时间(秒) 返回0代表为永久有效
     *
     * @author tarofang@163.com
     * @date 2019年08月11日
     */
    public long getExpire(String key) {
        return redisTemplate.getExpire(key, TimeUnit.SECONDS);
    }

    /**
     * 判断key是否存在
     *
     * @param key 键
     *
     * @return true 存在 false不存在
     *
     * @author tarofang@163.com
     * @date 2019年08月11日
     */
    public boolean hasKey(String key) {
        try {
            return redisTemplate.hasKey(key);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 按照指定的格式，获取所有匹配的Key
     *
     * @param pattern Key的格式
     *
     * @return {@code Set<String>} 所有匹配的Key
     *
     * @author ZhouYi
     * @date 2020/6/11 16:40
     * @description description
     * @note note
     */
    public Set<String> keys(String pattern) {
        return redisTemplate.keys(pattern);

    }

    /**
     * 删除缓存
     *
     * @param key 可以传一个值 或多个
     *
     * @author tarofang@163.com
     * @date 2019年08月11日
     */
    @SuppressWarnings("unchecked")
    public Long del(String... key) {
        if (key == null || key.length == 0) {
            return 0L;
        }

        if (key.length == 1) {
            Boolean removed = redisTemplate.delete(key[0]);
            return removed ? 1L : 0L;
        }
        return redisTemplate.delete((Collection<String>) CollectionUtils.arrayToList(key));
    }

    /**
     * 按照Key的格式，删除所有相关的键值对
     *
     * @param keyPattern Key的格式
     *
     * @return {@code Long} 被删除的数据数量，详见{@link RedisTemplate#delete(Collection)}
     *
     * @author ZhouYi
     * @date 2020/6/11 17:34
     * @description description
     * @note note
     */
    public Long delByKeyPattern(String keyPattern) {
        // // STEP Number 获取Key
        // Set<String> keys = redisTemplate.keys(keyPattern);
        //
        // // STEP Number 执行删除
        // if ((keys != null) && !(keys.isEmpty())) {
        //     return redisTemplate.delete(keys);
        //
        // }
        //
        // // STEP Number 未找到Key则返回0
        // return 0L;
        Set<String> keys = Sets.newHashSet();
        scan(keyPattern, 100, keys::add);
        if (keys != null && !keys.isEmpty()) {
            return redisTemplate.delete(keys);
        }

        return 0L;

    }

    // ============================String=============================

    /**
     * 普通缓存获取
     *
     * @param key 键
     *
     * @return 值
     */
    public Object get(String key) {
        return key == null ? null : redisTemplate.opsForValue().get(key);
    }

    public String getStr(String key) {
        Object val = get(key);
        if (val == null) {
            return null;
        }
        return String.valueOf(val);
    }

    public String getStr(String key, String defaultVal) {
        String res = getStr(key);
        return res == null ? defaultVal : res;
    }

    public List<Object> multiGet(Collection<String> keys) {
        return (keys == null || keys.isEmpty()) ? null : redisTemplate.opsForValue().multiGet(keys);

    }

    public List<Object> multiGet(String... keys) {
        return this.multiGet(new ArrayList<String>(Arrays.asList(keys)));

    }

    public List<String> multiGetStr(Collection<String> keys) {
        List<Object> objects = this.multiGet(keys);
        return (objects == null) ? null : objects.stream().map(item -> String.valueOf(item)).collect(Collectors.toList());

    }

    /**
     * 普通缓存放入
     *
     * @param key   键
     * @param value 值
     *
     * @return true成功 false失败
     */
    public boolean set(String key, Object value) {
        try {
            redisTemplate.opsForValue().set(key, value);
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    public void multiSet(Map<? extends String, ?> pairs) {
        if ((pairs != null) && !(pairs.isEmpty())) {
            redisTemplate.opsForValue().multiSet(pairs);

        }

    }

    public boolean multiSetIfAbsent(Map<? extends String, ?> pairs) {
        if ((pairs != null) && !(pairs.isEmpty())) {
            return redisTemplate.opsForValue().multiSetIfAbsent(pairs);

        }

        return false;

    }

    /**
     * 普通缓存放入并设置时间
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒) time要大于0 如果time小于等于0 将设置无限期
     *
     * @return true成功 false 失败
     */
    public boolean set(String key, Object value, long time) {
        // try {
        //     if (time > 0) {
        //         redisTemplate.opsForValue().set(key, value, time, TimeUnit.SECONDS);
        //     } else {
        //         set(key, value);
        //     }
        //     return true;
        // } catch (Exception ex) {
        //     log.debug("{}", ex.getMessage(), ex);
        //     return false;
        // }
        return set(key, value, time, TimeUnit.SECONDS);
    }

    public boolean set(String key, Object value, long time, TimeUnit timeUnit) {
        try {
            if (time > 0) {
                redisTemplate.opsForValue().set(key, value, time, timeUnit);
            } else {
                set(key, value);
            }
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 递增
     *
     * @param key   键
     * @param delta 要增加几(大于0)
     *
     * @return
     */
    public long incr(String key, long delta) {
        if (delta < 0) {
            throw new RuntimeException("递增因子必须大于0");
        }
        return redisTemplate.opsForValue().increment(key, delta);
    }

    /**
     * 递减
     *
     * @param key   键
     * @param delta 要减少几(小于0)
     *
     * @return
     */
    public long decr(String key, long delta) {
        if (delta < 0) {
            throw new RuntimeException("递减因子必须大于0");
        }
        return redisTemplate.opsForValue().increment(key, -delta);
    }

    // ================================Map=================================

    /**
     * HashGet
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     *
     * @return 值
     */
    public Object hGet(String key, String item) {
        return redisTemplate.opsForHash().get(key, item);
    }

    /**
     * 获取hashKey对应的所有键值
     *
     * @param key 键
     *
     * @return 对应的多个键值
     */
    public Map<Object, Object> hmGet(String key) {
        return redisTemplate.opsForHash().entries(key);
    }

    /**
     * HashSet
     *
     * @param key 键
     * @param map 对应多个键值
     *
     * @return true 成功 false 失败
     */
    public boolean hmSet(String key, Map<String, ?> map) {
        try {
            redisTemplate.opsForHash().putAll(key, map);
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * HashSet 并设置时间
     *
     * @param key  键
     * @param map  对应多个键值
     * @param time 时间(秒)
     *
     * @return true成功 false失败
     */
    public boolean hmSet(String key, Map<String, ?> map, long time) {
        try {
            redisTemplate.opsForHash().putAll(key, map);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     *
     * @return true 成功 false失败
     */
    public boolean hSet(String key, String item, Object value) {
        try {
            redisTemplate.opsForHash().put(key, item, value);
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 向一张hash表中放入数据,如果不存在将创建
     *
     * @param key   键
     * @param item  项
     * @param value 值
     * @param time  时间(秒) 注意:如果已存在的hash表有时间,这里将会替换原有的时间
     *
     * @return true 成功 false失败
     */
    public boolean hSet(String key, String item, Object value, long time) {
        try {
            redisTemplate.opsForHash().put(key, item, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 删除hash表中的值
     *
     * @param key  键 不能为null
     * @param item 项 可以使多个 不能为null
     */
    public void hDel(String key, Object... item) {
        redisTemplate.opsForHash().delete(key, item);
    }

    /**
     * 判断hash表中是否有该项的值
     *
     * @param key  键 不能为null
     * @param item 项 不能为null
     *
     * @return true 存在 false不存在
     */
    public boolean hHasKey(String key, String item) {
        return redisTemplate.opsForHash().hasKey(key, item);
    }

    /**
     * hash递增 如果不存在,就会创建一个 并把新增后的值返回
     *
     * @param key  键
     * @param item 项
     * @param by   要增加几(大于0)
     *
     * @return
     */
    public double hIncr(String key, String item, double by) {
        return redisTemplate.opsForHash().increment(key, item, by);
    }

    /**
     * hash递减
     *
     * @param key  键
     * @param item 项
     * @param by   要减少记(小于0)
     *
     * @return
     */
    public double hDecr(String key, String item, double by) {
        return redisTemplate.opsForHash().increment(key, item, -by);
    }

    // ============================set=============================

    /**
     * 根据key获取Set中的所有值
     *
     * @param key 键
     *
     * @return
     */
    public Set<Object> sGet(String key) {
        try {
            return redisTemplate.opsForSet().members(key);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return null;
        }
    }

    /**
     * 根据value从一个set中查询,是否存在
     *
     * @param key   键
     * @param value 值
     *
     * @return true 存在 false不存在
     */
    public boolean sHasKey(String key, Object value) {
        try {
            return redisTemplate.opsForSet().isMember(key, value);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 将数据放入set缓存
     *
     * @param key    键
     * @param values 值 可以是多个
     *
     * @return 成功个数
     */
    public long sSet(String key, Object... values) {
        try {
            return redisTemplate.opsForSet().add(key, values);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return 0;
        }
    }

    /**
     * 将set数据放入缓存
     *
     * @param key    键
     * @param time   时间(秒)
     * @param values 值 可以是多个
     *
     * @return 成功个数
     */
    public long sSetAndTime(String key, long time, Object... values) {
        try {
            Long count = redisTemplate.opsForSet().add(key, values);
            if (time > 0) {
                expire(key, time);
            }
            return count == null ? 0 : count;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return 0;
        }
    }

    /**
     * 获取set缓存的长度
     *
     * @param key 键
     *
     * @return
     */
    public long sGetSetSize(String key) {
        try {
            return redisTemplate.opsForSet().size(key);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return 0;
        }
    }

    /**
     * 移除值为value的
     *
     * @param key    键
     * @param values 值 可以是多个
     *
     * @return 移除的个数
     */
    public long setRemove(String key, Object... values) {
        try {
            Long count = redisTemplate.opsForSet().remove(key, values);
            return count == null ? 0 : count;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return 0;
        }
    }
    // ===============================list=================================

    /**
     * 获取list缓存的内容
     *
     * @param key   键
     * @param start 开始
     * @param end   结束 0 到 -1代表所有值
     *
     * @return
     */
    public List<Object> lGet(String key, long start, long end) {
        try {
            return redisTemplate.opsForList().range(key, start, end);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return null;
        }
    }

    /**
     * 获取list缓存的长度
     *
     * @param key 键
     *
     * @return
     */
    public long lGetListSize(String key) {
        try {
            return redisTemplate.opsForList().size(key);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return 0;
        }
    }

    /**
     * 通过索引 获取list中的值
     *
     * @param key   键
     * @param index 索引 index>=0时， 0 表头，1 第二个元素，依次类推；index<0时，-1，表尾，-2倒数第二个元素，依次类推
     *
     * @return
     */
    public Object lGetIndex(String key, long index) {
        try {
            return redisTemplate.opsForList().index(key, index);
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return null;
        }
    }

    /**
     * 获取list缓存的所有内容
     *
     * @param key 键
     *
     * @return {@code List<Object>} 返回值，可能为null
     *
     * @author ZhouYi
     * @date 2020/6/11 18:14
     * @description description
     * @note note
     */
    public List<Object> lGetAll(String key) {
        return lGet(key, 0, -1);

    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     *
     * @return
     */
    public boolean lSet(String key, Object value) {
        try {
            redisTemplate.opsForList().rightPush(key, value);
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     *
     * @return
     */
    public boolean lSet(String key, Object value, long time) {
        try {
            redisTemplate.opsForList().rightPush(key, value);
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     *
     * @return
     */
    public boolean lSetAll(String key, List<?> value) {
        try {
            if (value == null) {
                return false;
            }
            redisTemplate.opsForList().rightPushAll(key, value.toArray());
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 将list放入缓存
     *
     * @param key   键
     * @param value 值
     * @param time  时间(秒)
     *
     * @return
     */
    public boolean lSetAll(String key, List<?> value, long time) {
        try {
            if (value == null) {
                return false;
            }
            redisTemplate.opsForList().rightPushAll(key, value.toArray());
            if (time > 0) {
                expire(key, time);
            }
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 根据索引修改list中的某条数据
     *
     * @param key   键
     * @param index 索引
     * @param value 值
     *
     * @return
     */
    public boolean lUpdateIndex(String key, long index, Object value) {
        try {
            redisTemplate.opsForList().set(key, index, value);
            return true;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return false;
        }
    }

    /**
     * 移除N个值为value
     *
     * @param key   键
     * @param count 移除多少个
     * @param value 值
     *
     * @return 移除的个数
     */
    public long lRemove(String key, long count, Object value) {
        try {
            Long remove = redisTemplate.opsForList().remove(key, count, value);
            return remove == null ? 0 : remove;
        } catch (Exception ex) {
            log.debug("{}", ex.getMessage(), ex);
            return 0;
        }
    }


    @SuppressWarnings("unchecked")
    public void scan(String keyPattern, int limit, RedisScanCallback callback) {
        final RedisSerializer<String> redisSerializer = (RedisSerializer<String>) redisTemplate.getKeySerializer();
        byte[] keyBytes = redisSerializer.serialize(keyPattern);
        String matchKey = new String(keyBytes, StandardCharsets.UTF_8);
        // final ScanOptions options = ScanOptions.scanOptions().match(keyPattern).count(limit).build();
        final ScanOptions options = ScanOptions.scanOptions().match(matchKey).count(limit).build();

        RedisCallback<Cursor<String>> redisCallback = new RedisCallback<Cursor<String>>() {
            @Override
            public Cursor<String> doInRedis(RedisConnection redisConnection) throws DataAccessException {
                return new ConvertingCursor<>(redisConnection.scan(options), redisSerializer::deserialize);
            }
        };

        try (Cursor<String> cursor = redisTemplate.executeWithStickyConnection(redisCallback)) {
            while (cursor.hasNext()) {
                callback.scanItem(cursor.next());
            }
        } catch (Exception ex) {
            log.error(ex.getMessage(), ex);
        }
    }

    public void scan(String keyPattern, RedisScanCallback callback) {
        scan(keyPattern, 1000, callback);
    }

}
